home *** CD-ROM | disk | FTP | other *** search
/ Expose 4 / Expose_Issue_4_1992-06-10_Expose_Staff_Side_B.d64 / expose reader < prev    next >
Text File  |  2023-02-26  |  763b  |  37 lines
  1. ;---------------------------------------
  2. ; This program will reload Expose' after
  3. ; your page is done.  We're making this
  4. ; as easy as possible on you, so let's
  5. ; make sure to add this or another load
  6. ; routine to your pages for Expose'!!!
  7. ;---------------------------------------
  8.  
  9.          sei
  10.          sei
  11.          lda #$31
  12.          ldx #$ea
  13.          sta $0314
  14.          stx $0315
  15.          lda #$37
  16.          sta $01
  17.  
  18.          jsr $ff81
  19.          jsr $ff84
  20.          jsr $ff8a
  21.  
  22.          ldx #$00
  23. loadloop lda loadtext,x
  24.          sta $0800,x
  25.          inx
  26.          cpx #$21
  27.          bne loadloop
  28.  
  29.          cli
  30.          jsr $a659
  31.          jmp $a7ae
  32.  
  33. loadtext .byte $00,$12,$08,$06,$06,$93
  34.          .byte $22,$45,$58,$50,$4f,$53
  35.          .byte $2a,$22,$2c,$38,0,0,0,0
  36.  
  37.